module parameters

  use dimensions

  character*80 :: runname


  !-- input parameters --

  real       :: phi0, kz, vPhase,  Dxxxx, Dyyyy, Dvvvv
  integer    :: nz,  iWaveFrame, iFixPump
  real       :: ModAmp, Lx, Ly, SpeckleWidth, SpeckleDepth

  integer    :: restart, nt
  real       :: Vmax, dt, KxFilter, KyFilter 
  integer    :: iself, iDiag, iData, iBcPerpPeriodic, iFourier

  logical    :: iModx, iMody, iModz, iE0Modulation 


  !-- constants --

  real       :: pi
  complex    :: iunit

  real       :: ux0(jDirection)
  real       :: uy0(jDirection)

  data       iunit                / (0.0, 1.0) /


end module
